home *** CD-ROM | disk | FTP | other *** search
- $INCLUDE (samgen.mdf)
- %Init
- $EJECT
- %DeviceOpen([Kbd],OpenByteStreamK)
- %DeviceOpen([Vid],OpenByteStreamVid)
- %DeviceOpen([Lpt],OpenByteStreamLpt)
- %DeviceOpen([Ptr],OpenByteStreamC)
- %DeviceOpen([Nul],OpenByteStreamN)
- %DeviceOpen([Comm],OpenByteStreamC)
- %DeviceOpen([Spl],OpenByteStreamSpl)
- %DeviceOpen([Disk],OpenByteStreamAD)
- $EJECT
- %tagProcs(tagDiskRead,FillBufferAD,FlushBufIllegal,CheckPointBsAD,ReleaseByteStreamAD,SetImageModeIllegal)
- %tagProcs(tagDiskWrite,FillBufIllegal,FlushBufferAD,CheckPointBsAD,ReleaseByteStreamAD,SetImageModeIllegal)
- %tagProcs(tagDiskModify,FillBufferAD,FlushBufferAD,CheckPointBsAD,ReleaseByteStreamAD,SetImageModeIllegal)
- %tagProcs(tagKbdRead,FillBufferK,FlushBufIllegal,ChkptNop,ReleaseEasy,SetImageModeIllegal)
- %tagProcs(tagVideoWrite,FillBufIllegal,FlushBufferVid,ChkptNop,ReleaseEasy,SetImageModeIllegal)
- %tagProcs(tagLptWrite,FillBufIllegal,FlushBufferLpt,CheckPointBsLpt,ReleaseByteStreamLpt,SetImageModeLpt)
- %tagProcs(tagPtrWrite,FillBufIllegal,FlushBufferC,CheckPointBsC,ReleaseByteStreamC,SetImageModeC)
- %tagProcs(tagNul,FillBufferN,FlushBufferN,ChkptNop,ReleaseEasy,SetImageModeIllegal)
- %tagProcs(tagCommRead,FillBufferC,FlushBufIllegal,CheckPointBsC,ReleaseByteStreamC,SetImageModeC)
- %tagProcs(tagCommWrite,FillBufIllegal,FlushBufferC,CheckPointBsC,ReleaseByteStreamC,SetImageModeC)
- %tagProcs(tagCommModify,FillBufferC,FlushBufferC,CheckPointBsC,ReleaseByteStreamC,SetImageModeC)
- %tagProcs(tagSplWrite,FillBufIllegal,FlushBufferAD,CheckPointBsAD,ReleaseByteStreamSpl,SetImageModeSpl)
- $EJECT
- %DevDepProc(QueryVidBs,QueryVideoBs)
- %DevDepProc(GetBsLfa,GetBsLfaAsync)
- %DevDepProc(SetBsLfa,SetBsLfaAsync)
- %DevDepProc(SetImageMode,SetImageModeBrn)
- %Final
-